home *** CD-ROM | disk | FTP | other *** search
/ AMIGA-CD 2 / Amiga-CD - Volume 2.iso / ungepackte_daten / 1993 / 6 / 02 / tips & tricks / lifting.c < prev    next >
Encoding:
Text File  |  1995-06-01  |  669 b   |  31 lines

  1. void
  2. MakeProp(struct Window *wnd,struct Gadget *GList)
  3. {
  4.   struct Gadget    *g=wnd->FirstGadget;
  5.   struct PropInfo  *pi;
  6.  
  7.   /* Gadgets vorhanden ? */
  8.   if( g==NULL )
  9.     return();
  10.  
  11.   while( g != NULL ) {
  12.     /* Existiert eine Specialinfo-Struktur ? */
  13.     if( g->SpecialInfo ) {
  14.       /* Ist es ein Proportional-Gadget ? */
  15.       if(g->GadgetType & GTYP_PROPGADGET) {
  16.         pi=(struct PropInfo *)g->SpecialInfo;
  17.         /* Via Flag dem Gadget ein neues
  18.          * Aussehen verpassen */
  19.         pi->Flags |= PROPNEWLOOK;
  20.  
  21.         /* Gadget neu zeichnen */
  22.         RefreshGadgets(GList,wnd,0);
  23.       }
  24.     }
  25.  
  26.     /* Nächstes Gadget holen */
  27.     g=g->NextGadget;
  28.   }
  29. }
  30.  
  31.